Mainframe হল একটি অত্যন্ত শক্তিশালী কম্পিউটার সিস্টেম, যা মূলত ব্যবসায়িক, সরকারি, এবং বৃহৎ প্রতিষ্ঠানে ব্যবহৃত হয়। Mainframe সিস্টেমে সাধারণত বিশাল পরিমাণে ডেটা স্টোর করা হয় এবং এই ডেটার কার্যকরী অ্যাক্সেস নিশ্চিত করতে বিভিন্ন ফাইল সিস্টেম এবং ডেটাবেস ব্যবস্থাপনা সিস্টেম ব্যবহার করা হয়। COBOL ভাষা প্রধানত Mainframe অ্যাপ্লিকেশন ডেভেলপমেন্টের জন্য ব্যবহৃত হয়, যেখানে ফাইল এবং ডেটাবেসের মাধ্যমে ডেটা ম্যানিপুলেশন করা হয়।
এখানে, Mainframe ফাইল এবং ডেটাবেস অ্যাক্সেস নিয়ে কিছু গুরুত্বপূর্ণ ধারণা এবং তাদের ব্যবহারের উদাহরণ আলোচনা করা হলো।
Mainframe সিস্টেমে ডেটা সঞ্চয় ও প্রক্রিয়া করার জন্য বিভিন্ন ধরনের ফাইল ব্যবহৃত হয়, যেমন Sequential Files, Indexed Files, Relative Files ইত্যাদি। COBOL প্রোগ্রামে এই ফাইলগুলো ব্যবহারের জন্য সঠিক ফাইল ম্যানেজমেন্ট কৌশল প্রয়োজন।
Sequential Files হলো এমন ফাইল যেখানে ডেটা একটি নির্দিষ্ট সিকোয়েন্স বা অর্ডারে সংরক্ষিত থাকে। COBOL-এ এই ফাইলটি খুব সাধারণভাবে ব্যবহৃত হয়।
FILE-CONTROL.
SELECT SEQ-FILE ASSIGN TO 'SEQFILE.TXT'
ORGANIZATION IS SEQUENTIAL
ACCESS MODE IS SEQUENTIAL
FILE STATUS IS FILE-STATUS.
DATA DIVISION.
FILE SECTION.
FD SEQ-FILE.
01 SEQ-RECORD.
05 NAME PIC X(30).
05 SALARY PIC 9(5)V99.
এখানে, SEQ-FILE ফাইলটি একটি সিকোয়েনশিয়াল ফাইল হিসাবে ডিফাইন করা হয়েছে এবং এতে NAME এবং SALARY নামক দুটি কলাম সংরক্ষিত হবে।
Indexed Files একটি ফাইল স্ট্রাকচার যেখানে ডেটা অ্যাক্সেস করতে একটি ইনডেক্স ব্যবহার করা হয়। এতে ডেটা দ্রুত অনুসন্ধান করা সম্ভব।
FILE-CONTROL.
SELECT INDEXED-FILE ASSIGN TO 'INDEXFILE.DAT'
ORGANIZATION IS INDEXED
ACCESS MODE IS DYNAMIC
RECORD KEY IS EMPLOYEE-ID
FILE STATUS IS FILE-STATUS.
DATA DIVISION.
FILE SECTION.
FD INDEXED-FILE.
01 EMPLOYEE-REC.
05 EMPLOYEE-ID PIC 9(6).
05 EMPLOYEE-NAME PIC X(30).
05 EMPLOYEE-SALARY PIC 9(5)V99.
এখানে, INDEXED-FILE একটি ইনডেক্সড ফাইল হিসাবে ডিফাইন করা হয়েছে, যেখানে EMPLOYEE-ID হচ্ছে ইনডেক্স কী। এর মাধ্যমে ডেটা দ্রুত খুঁজে বের করা যায়।
Relative Files এ ডেটা অবস্থান একটি relative record number দ্বারা চিহ্নিত করা হয়। এটি ডেটার জন্য একটি নির্দিষ্ট রেঞ্জ সংরক্ষণ করে।
FILE-CONTROL.
SELECT RELATIVE-FILE ASSIGN TO 'RELFILE.DAT'
ORGANIZATION IS RELATIVE
ACCESS MODE IS DYNAMIC
RECORD KEY IS EMPLOYEE-ID
FILE STATUS IS FILE-STATUS.
DATA DIVISION.
FILE SECTION.
FD RELATIVE-FILE.
01 EMPLOYEE-REC.
05 EMPLOYEE-ID PIC 9(6).
05 EMPLOYEE-NAME PIC X(30).
05 EMPLOYEE-SALARY PIC 9(5)V99.
এখানে, RELATIVE-FILE একটি রিলেটিভ ফাইল হিসেবে ডিফাইন করা হয়েছে এবং EMPLOYEE-ID এর মাধ্যমে ডেটা অ্যাক্সেস করা হবে।
Mainframe সিস্টেমে ডেটাবেস অ্যাক্সেস করতে DB2, IMS DB, বা VSAM (Virtual Storage Access Method) ব্যবহার করা হয়। COBOL প্রোগ্রামে SQL কোয়েরি চালাতে Embedded SQL বা Precompiled SQL ব্যবহৃত হয়।
DB2 IBM-এর একটি জনপ্রিয় রিলেশনাল ডেটাবেস সিস্টেম, যা Mainframe সিস্টেমে ব্যবহৃত হয়। COBOL প্রোগ্রামে DB2 অ্যাক্সেস করতে Embedded SQL ব্যবহার করা হয়।
EXEC SQL
DECLARE C1 CURSOR FOR EMPLOYEE-CURSOR
OPEN C1
END-EXEC.
EXEC SQL
FETCH C1 INTO :EMPLOYEE-ID, :EMPLOYEE-NAME, :EMPLOYEE-SALARY
END-EXEC.
EXEC SQL
CLOSE C1
END-EXEC.
এখানে, DECLARE SQL স্টেটমেন্ট দ্বারা একটি কুরসর ডিক্লেয়ার করা হয়েছে যা EMPLOYEE-CURSOR এর মাধ্যমে EMPLOYEE-ID, EMPLOYEE-NAME, এবং EMPLOYEE-SALARY ডেটা পড়বে।
IMS DB IBM-এর আরেকটি ডেটাবেস সিস্টেম যা Mainframe এ ব্যবহৃত হয়। COBOL প্রোগ্রামে IMS DB অ্যাক্সেস করতে CALL স্টেটমেন্ট এবং DLI (Data Language Interface) ব্যবহার করা হয়।
CALL 'IMSDB-RECORD' USING EMPLOYEE-ID, EMPLOYEE-NAME, EMPLOYEE-SALARY.
এখানে, IMSDB-RECORD একটি IMS DB ফাংশন কল হচ্ছে, যা EMPLOYEE-ID, EMPLOYEE-NAME, এবং EMPLOYEE-SALARY এর মাধ্যমে ডেটা প্রক্রিয়া করবে।
VSAM (Virtual Storage Access Method) হল একটি ফাইল সিস্টেম যা Mainframe এ ডেটা স্টোরেজ এবং অ্যাক্সেসের জন্য ব্যবহৃত হয়।
SELECT VSAM-FILE ASSIGN TO 'VSAMFILE'
ORGANIZATION IS INDEXED
ACCESS MODE IS DYNAMIC
FILE STATUS IS FILE-STATUS.
READ VSAM-FILE INTO EMPLOYEE-REC
INVALID KEY
DISPLAY 'Record not found.'
NOT INVALID KEY
DISPLAY 'Record found.'
END-READ.
এখানে, VSAM-FILE ফাইলটি ইনডেক্সড এবং DYNAMIC অ্যাক্সেস মোডে ব্যবহৃত হচ্ছে।
Mainframe ফাইল এবং ডেটাবেস অ্যাক্সেস COBOL প্রোগ্রামে ডেটা প্রক্রিয়াকরণের জন্য গুরুত্বপূর্ণ ভূমিকা পালন করে। Sequential Files, Indexed Files, DB2, IMS DB, এবং VSAM এর মাধ্যমে কার্যকরী ফাইল এবং ডেটাবেস অ্যাক্সেস করা সম্ভব, যা মেমরি ব্যবস্থাপনা এবং ডেটার দ্রুত প্রক্রিয়াকরণের জন্য অত্যন্ত কার্যকর। COBOL-এ Embedded SQL এবং DLI ব্যবহারের মাধ্যমে ডেটাবেস অ্যাক্সেস করা যায়, যা ব্যবসায়িক অ্যাপ্লিকেশনগুলোকে আরও দক্ষ করে তোলে।
common.read_more